home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / phildov20.exe / pevents.ini < prev    next >
Encoding:
INI File  |  1997-03-15  |  14.3 KB  |  174 lines
  1. [Events]
  2. n0=1:ON JOIN:#: if ($nick == w) { halt } | if ($nick == x) { halt } | if ($nick == $me) { halt } | whois $nick 
  3. n1=1:ON PART:#: /close -f $nick  |  /close -s $nick
  4. n2=1:ON SERVOPEN: {
  5. n3=  inc %ppljoin 1 | /msg = $+ $nick  %ppljoin  people have accessed my FServ Since 03/13/97  %romm
  6. n4=  .msg =$nick 12-={10pHiLdO12}=- 1-=[10v2.01]=- 12bY 1,10º1,10ñ1,10º14,1■15,1h14,1∩15,1ú14,1╨15,1O1,10º1,10ñ1,10º
  7. n5=  halt
  8. n6=}
  9. n7=1:ON NOTIFY:/wavplay welcome.wav | /notice $me Hey, wake up! $nick just joined IRC!
  10. n8=1:ON TEXT:*wassup*:#:/notice $nick wassup (slang); A) Hello, how are you? B) Yo man what the F*CK up?
  11. n9=1:ON TEXT:*lamer*:#:/notice $nick lamer (slang); A) Aperson that is lacking in computer knowledge B) A F*CKIN idiot that needs to read basic computing for dummies!
  12. n10=1:ON TEXT:*hello?*:#:/notice $nick Busy talking to ourselves are we???
  13. n11=@25:ON JOIN:#:/mode $chan +v $nick | /notice $nick Ñ≡ⁿ hσvΩ ▀ΩΩ± σⁿt≡ v≡∩⌐Ω╨ ▀Ñ: 12-={10pHiLdO12}=- 1-=[10v2.01]=-
  14. n12=@666:ON JOIN:#:/ban $chan $nick 3 | /kick $chan $nick -=Ñ≡ⁿ'«Ω ºh∩tú∩ºtΩ╨ σººh≡úΩ!!=-  12-={10pHiLdO12}=- 1-=[10v2.01]=-
  15. n13=@69:ON JOIN:#:/mode $chan +o $nick | /notice $nick Ñ≡ⁿ hσvΩ ▀ΩΩ± σⁿt≡-≡■'╨ ▀Ñ: 12-={10pHiLdO12}=- 1-=[10v2.01]=-
  16. n14=#Slap start
  17. n15=1:ON ACTION:*slaps*:#:/kick $chan $nick 10 dAmN!!! 4 sLaPpEd hIm 13 sOoOoOo 12 hArD 9 yOu 6 sLaPpEd yOuRsElF rIgHt oUtTa dA cHaNnEl!!! 4-={tHiS iS a nO sLaP zOnE}=-
  18. n16=#Slap end
  19. n17=#Cuss disabled
  20. n18=1:ON TEXT:*fuck*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  21. n19=1:ON TEXT:*cunt*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  22. n20=1:ON TEXT:*bitch*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  23. n21=1:ON TEXT:*fuk*:#:/kick $chan $nick Too close to the real thing! We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  24. n22=1:ON TEXT:*pussy*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  25. n23=1:ON TEXT:*cock*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  26. n24=1:ON TEXT:*goddamn*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  27. n25=1:ON TEXT:*bastard*:#:/kick $chan $nick We don't use that kind of language in this channel! You have been kicked by 12-={10pHiLdO12}=- 1-=[10v2.01]=- |<uss |<ick!
  28. n26=#Cuss end
  29. n27=#HACK disabled
  30. n28=*1:ON SERVEROP:#:/mode $chan -o $opnick | /notice $me $opnick was opped by $nick! | /msg $chan NO SERVEROPS ALLOWED! 12-={10pHiLdO12}=- 1-=[10v2.01]=- HACK PROTECTION!
  31. n29=*1:ON MODE:#:-smplki+tn | /mode $chan -o $nick | /msg $chan NO NETSPLIT RIDERS OPS ALLOWED! =%■~~~ 12-={10pHiLdO12}=- 1-=[10v2.01]=-
  32. n30=*1:ON SERVERMODE:#:-smplki+tn | /msg $chan NO NETSPLIT RIDERS OPS ALLOWED! =%■~~~ 12-={10pHiLdO12}=- 1-=[10v2.01]=-
  33. n31=#HACK end
  34. n32=#away start
  35. n33=1:on text:+PAGE:?: {
  36. n34=  ignore -up10 $wildsite
  37. n35=  if (%pager = OFF) { msg $nick sorry my pager is off (type +MSG <text> to leave a msg) }
  38. n36=  elseif (%pager = ON) { splay c:\phildov20\page.wav | msg $nick i'v been paged.. if i hear ya i'll come }
  39. n37=}
  40. n38=1:on text:+MSG*:?: { ignore -up10 $wildsite | msg $nick your /msg was saved | write $mircdir $+ msg.txt $nick ( $+ $address $+ ) left the msg: $parm2* }
  41. n39=1:on text:*:?: { ignore -up10 $wildsite | msg $nick sorry i'm away right now, Reason: Ä $+ [ %away ] $+ Ä (type +MSG <text> to leave a msg) }
  42. n40=1:on text:*:#:
  43. n41=if ($me isin $parms) { 
  44. n42=  if (%pager = OFF) { ignore -uc10 $wildsite | notice $nick have you said my name?? i think so.. or maybe i'm wrong??... well anyway.. i'm away since %date !! }
  45. n43=  elseif (%pager = ON) { ignore -uc10 $wildsite | notice $nick have you said my name?? i think so.. or maybe i'm wrong??... well anyway.. i'm away since %date !! | /notice $nick you can page me by typing /CTCP $me PAGE and if i'll hear you i will come :o) }
  46. n44=}
  47. n45=else { halt }
  48. n46=}
  49. n47=#away end
  50. n48=#Text disabled
  51. n49=+1:on text:*:#:/auser -a =24 $nick | /timer 1 5 /ruser 24 $nick
  52. n50=+24:on text:*:#:/auser -a =25 $nick | /timer 1 5 /ruser 25 $nick
  53. n51=+25:on text:*:#:/auser -a =26 $nick | /timer 1 5 /ruser 26 $nick
  54. n52=+26:on text:*:#:/auser -a =27 $nick | /timer 1 5 /ruser 27 $nick
  55. n53=+27:on text:*:#:/auser -a =28 $nick | /timer 1 5 /ruser 28 $nick
  56. n54=+28:on text:*:#:/auser -a =29 $nick 3 | /ban -u15 $chan $nick 3 | /kick $chan $nick flooding this channel only gets you kicked | /ruser 28 $nick
  57. n55=#Text end
  58. n56=#Nick start
  59. n57=+1:on nick:/auser -a =31 $newnick | /timer 1 15 /ruser 31 $newnick 
  60. n58=+31:on nick:/auser -a =32 $newnick | /timer 1 15 /ruser 32 $newnick 
  61. n59=+32:on nick:/auser -a =33 $newnick | /timer 1 15 /ruser 33 $newnick 
  62. n60=+33:on nick:/auser -a =34 $newnick | /timer 1 15 /ruser 34 $newnick 
  63. n61=+34:on nick:/ban -u60 $chan $nick 3 | /kick $chan $newnick flooding this channel only gets you kicked  | /ruser 35 $nick 
  64. n62=#Nick end
  65. n63=#Notice disabled
  66. n64=+1:on notice:dcc chat*:*:/auser -a =42 $nick | /timer 1 10  /ruser 42 $nick
  67. n65=+42:on notice:dcc chat*:*:/auser -a =43 $nick | /timer 1 10 /ruser 43 $nick
  68. n66=+43:on notice:dcc chat*:*:/auser -a =44 $nick | /timer 1 10 /ruser 44 $nick
  69. n67=+44:on notice:dcc chat*:*:/ban -u60 %chan1 $nick 3 | /ban -u60 %chan2 $nick 3 | /ban -u60 %chan3 $nick 3 | /ignore $nick 3 | /msg $nick flooding me does you no good!! | /kick %chan1 $nick Flooding with me does you no good!!!!! | /kick %chan2 $nick Flooding with me does you no good!!!!! | /kick %chan3 $nick Flooding with me does you no good!!!!! | /ruser 49 $nick
  70. n68=1:on notice:dcc send*:*:/notice $nick $parm3 sent by you is logged!! . | /write c:\mirc\text\get.txt $parm3 $nick $ip $address $date $time | /auser -a =46 $nick | /timer 1 10 /ruser 46 $nick
  71. n69=+45:on notice:dcc send*:*:/auser -a =46 $nick | /timer 1 10 /ruser 46 $nick
  72. n70=+46:on notice:dcc send*:*:/auser -a =47 $nick | /timer 1 10 /ruser 47 $nick
  73. n71=+47:on notice:dcc send*:*:/auser -a =48 $nick | /notice $nick please stop sending to me you are flooding me. I will not ask you again!!! | /timer 1 10 /ruser 48 $nick
  74. n72=+48:on notice:dcc send*:*:/auser -a =49 $nick | /timer 1 10 /ruser 49 $nick
  75. n73=+49:on notice:dcc send*:*:/ban -u60 %chan1 $nick 3 | /ban -u60 %chan2 $nick 3 | /ban -u60 %chan3 $nick 3 | /ignore $nick 3 | /msg $nick flooding me does you no good!!!! | /kick %chan1 $nick Flooding with me does you no good!!!!! | /kick %chan2 $nick Flooding with me does you no good!!!!! | /kick %chan3 $nick Flooding with me does you no good!!!!! | /ruser 49 $nick
  76. n74=+1:on notice:*:#:/auser -a =50 $nick | /timer 1 10 /ruser 50 $nick
  77. n75=+50:on notice:*:#:/auser -a =51 $nick | /timer 1 10 /ruser 51 $nick
  78. n76=+51:on notice:*:#:/auser -a =52 $nick | /timer 1 10 /ruser 52 $nick
  79. n77=+52:on notice:*:#:/auser -a =53 $nick | /timer 1 10 /ruser 53 $nick
  80. n78=+53:on notice:*:#:/ban -u60 $chan $nick 3 | /describe $chan Notice Flood Protector Activated By $nick!!!! | /ignore $nick 3 | /msg $nick flooding me does you no good!!! | /kick $chan $nick | /ruser 53 $nick
  81. n79=#Notice end
  82. n80=#Action disabled
  83. n81=+1!:on action:*:#:/auser -a =61 $nick | /timer 1 15 /ruser 61 $nick
  84. n82=+61!:on action:*:#:/auser -a =62 $nick | /timer 1 15 /ruser 62 $nick
  85. n83=+62!:on action:*:#:/auser -a =63 $nick | /timer 1 15 /ruser 63 $nick
  86. n84=+63!:on action:*:#:/auser -a =64 $nick | /timer 1 15 /ruser 64 $nick
  87. n85=+64!:on action:*:#:/ban -u60 $chan $nick 3 | /kick $chan $nick flooding this channel only gets you kicked!!!!
  88. n86=#Action end
  89. n87=#Join start
  90. n88=+1!:on join:#:/auser -a =65 $nick | /timer 1 5 /ruser 65 $nick
  91. n89=+65!:on join:#:/auser -a =66 $nick | /timer 1 5 /ruser 66 $nick
  92. n90=+66!:on join:#:/auser -a =67 $nick | /timer 1 5 /ruser 67 $nick
  93. n91=+67!:on join:#:/auser -a =68 $nick | /timer 1 5 /ruser 68 $nick
  94. n92=+68!:on join:#:/ban -u60 $chan $nick 3 | /kick $chan $nick flooding this channel only gets you kicked!!!!
  95. n93=#Join end
  96. n94=#xdccmsg disabled
  97. n95=1:ON TEXT:xdcc*:? {
  98. n96=set %pack $remove($parm3,$chr(35)) | if (%xdccs == off) goto off | if ($parm2 == list && $parm3 != $null) goto showlist | if ($parm2 == list) goto list | if ($parm2 == queue) goto queue | if ($parm2 == help) goto help | if ($parm2 == send) goto send | raw -q notice $nick :Error. /MSG $me XDCC HELP. | halt | :list | nlist $nick | halt | :send | if ($send(0) >= %maxslots) { if ($lines(%qpath) >= %maxqueue) goto qfull | write %qpath $nick %pack
  99. n97=raw -q notice $nick :DCC Limit reached: Will send you %filedesc [ $+ [ %pack ] ] $+ , which is one file, when a slot opens. | raw -q notice $nick :You are in query position  $+ $lines(%qpath) $+  of  $+ %maxqueue $+ . | halt } | if (%pack > %numpacks) { raw -q notice $nick :File # $+ %pack $+  does not exist. /MSG $me XDCC LIST. | halt } | psend $nick %pack | halt
  100. n98=:off | raw -q notice $nick :There are no files offered. | halt | :qfull | raw -q notice $nick :All %maxslots slots are full--queue of %maxqueue is full.  Try again later. | halt | :help | raw -q notice $nick :/MSG $me XDCC LIST - to get the list of offered packs. | raw -q notice $nick :/MSG $me XDCC LIST #<N> - to get more info on pack #<N>. | raw -q notice $nick :/MSG $me  XDCC SEND #<N> - to send pack #<N>. | halt | :queue | raw -q notice $nick :Queue Length: $lines(%qpath) / %maxqueue | halt 
  101. n99=:showlist | %nopath = $nopath(%file [ $+ [ %pack ] ] ) | %ngets = %get [ $+ [ %pack ] ] | if (%pack > %numpacks) { raw -q notice $nick :File # $+ %pack $+  does not exist. /MSG $me XDCC LIST. | halt } | raw -q notice $nick :Pack: %filedesc [ $+ [ %pack ] ] | raw -q notice $nick :LengtháááááFile | raw -q notice $nick : $+ $lof(%file [ $+ [ %pack ] ] ) áá %nopath | raw -q notice $nick :---------- ------------------------------------------------- | raw -q notice $nick : $+ $lof(%file [ $+ [ %pack ] ] ) áá 1 file(s) :: %ngets Snags
  102. n100=} 
  103. n101=#xdccmsg end
  104. n102=1:ON FILESENT:* { 
  105. n103=set %i 0 | :start | inc %i | if ($send(%i) == $null) goto end | if ($nick == $send(%i) && $nopath($filename) == $send(%i).file) goto next | else goto start | :next | if ($send(%i).cps == n/a) goto end | %cpssend = $kps($send(%i).cps) | %sntime = $send(%i).size / $send(%i).cps | echo %c -a %h $lof($filename) bytes sent to  $+ %c2 $+ $nick in %sntime secs ( $+ %cpssend $+ kb/s)
  106. n104=:end | if (%cpssend > %lrecord && %xdccs == on) { set %record $token(1,46,%cpssend) | set %lrecord %cpssend | echo %c -a %h New record:  $+ %cpssend $+ kb/s | raw -q notice $nick :New record set by you at  $+ %cpssend $+ kb/s! } | if ((%xdccs == on) && ($lines(%qpath) >= 1) && ($send(0) <= %maxslots)) psend $read -l1 %qpath queue
  107. n105=}
  108. n106=1:on text:!*:*: {
  109. n107=if ( $parm1 == ! $+ $me ) goto start
  110. n108=halt
  111. n109=:start
  112. n110=if $right(3,$parm2) == wav || $right(3,$parm2) == mid { set %findfil $findfile($wavedir,$parm2,1) } 
  113. n111=if $right(3,$parm2) == txt set %findfil $findfile(%textdir,$parm2,1) 
  114. n112=if %findfil == $null { goto donthave }
  115. n113=else goto filesnd
  116. n114=halt
  117. n115=:filesnd
  118. n116=dcc send $nick %findfil
  119. n117=inc %filesent +1 
  120. n118=notice $nick Here comes $parm2 $+ .. %filesent files sent since 03/12/97!
  121. n119=notice $nick Auto Sender bY ºñº CoolMoFo ºñº
  122. n120=halt
  123. n121=:donthave
  124. n122=notice $nick Sorry $nick $+ ! Unable to locate file $parm2 $+ ! Check your Spelling and try again!
  125. n123=halt
  126. n124=}
  127. n125=#Sounds disabled
  128. n126=1:ON NOSOUND:/set %wavnick ! $+ $nick | /msg $chan %wavnick $filename | /notice $nick I don't have that sound, could you please send it to me? Thank you :)
  129. n127=#Sounds end
  130. n128=#AVG start
  131. n129=@1:ON PART:#:/notice $nick Thank you for visiting $chan $+ ! Please come again!:)! 
  132. n130=#AVG end
  133. n131=1:ON SNOTICE:*split*:/msg $me -=[NetSplit Detected]=-
  134. n132=1:ON CTCPREPLY:PING* {
  135. n133=if ($parm2 == $null) notice 12-={10pHiLdO12}=- 1-=[10v2.01]=- $nick  PING reply on $nick = (0 seconds)
  136. n134=else {
  137. n135=  %pt = $ctime - $parm2
  138. n136=  if (%pt < 0) set %pt 0
  139. n137=  notice $nick 12-={10pHiLdO12}=- 1-=[10v2.01]=-  PING reply on $nick = ( $+ %pt seconds $+ ) 
  140. n138=}
  141. n139={ echo 4 $active 12-={10pHiLdO12}=- 1-=[10v2.01]=- PING reply on $nick = ( $+ %pt seconds $+ )
  142. n140=}
  143. n141=halt
  144. n142=}
  145. n143=1:ON QUIT: {
  146. n144=IF (( .net ISIN $parms ) || ( .com ISIN $parms ) || ( .org ISIN $parms ) || ( .irc ISIN $parms )) {
  147. n145=  echo 4 $active *** Possible Split: $parms
  148. n146=}
  149. n147=1:ON FILERCVD:*: {
  150. n148=  %size = $lof($filename) | if ( %size < 1000 ) { set %size [ %size ] $+ b }
  151. n149=  elseif (%size > 1000000) { %m = %size / 1000000 | %k = %size % 1000000 | %k = %k / 100000
  152. n150=  set %size [ %m ] $+ . $+ [ %k ] $+ m  }
  153. n151=  else { %k = %size / 1000 | set %size [ %k ] $+ k }
  154. n152=  %gcps = $get(1).cps 
  155. n153=  if ( %gcps == n/a ) { set %gcps 0 }
  156. n154=  echo 12 -a 12-={10pHiLdO12}=- 1-=[10v2.01]=- Received: 4< $nopath($filename) ( $+ %size $+ ) 4> from 4< $nick 4> at [ %gcps ] $+ cps 
  157. n155=  unset %cps %k %m %size %gcps
  158. n156=}
  159. n157=1:ON FILESENT:*: {
  160. n158=  %size = $lof($filename) |  if ( %size < 1000 ) { set %size [ %size ] $+ b }
  161. n159=  elseif (%size > 1000000) { %m = %size / 1000000 | %k = %size % 1000000 | %k = %k / 100000
  162. n160=  set %size [ %m ] $+ . $+ [ %k ] $+ m }
  163. n161=  else { %k = %size / 1000 | set %size [ %k ] $+ k }
  164. n162=  %scps = $send(1).cps
  165. n163=  if ( %scps == n/a ) { set %scps 0 }
  166. n164=  echo 12 -a 12-={10pHiLdO12}=- 1-=[10v2.01]=- Sent: 4< $nopath($filename) ( $+ %size $+ ) 4> to 4< $nick 4> at [ %scps ] $+ cps 
  167. n165=  if ( %scps > %cpsrecord ) {
  168. n166=    set %cpsrecord %scps
  169. n167=    .notice $send(1) 12-={10pHiLdO12}=- 1-=[10v2.01]=- New DCC Send Record 4< [ %scps ] $+ cps 4>
  170. n168=    echo 12 -a 12-={10pHiLdO12}=- 1-=[10v2.01]=- New DCC Send Record 4< [ %scps ] $+ cps 4>
  171. n169=  }
  172. n170=  unset %size %k %m %cps %scps
  173. n171=}
  174.